1 REM ++++++++++++++++++ 2 REM + APOCALYPSE NOW + 3 REM ++++++++++++++++++******** 4 REM * BY HELMUT BURGEMEISTER * 5 REM * AND HELMUT BOELCSKEI * 6 REM ************************** 7 REM ^^^^^^^^^^^^^^^^^^^^^^^^^^^ 8 REM ^ MASCHINEN PROGRAMM ^ 9 REM ^^^^^^^^^^^^^^^^^^^^^^^^^^^ 10 PRINT"[147]BITTE WARTEN !" 20 POKE53281,0 30 POKE53280,0 40 FORI=832TO832+33:READA:POKEI,A:NEXT 50 DATA120,169,51,133,1,169,0,133,95,133,90,133,88,169,208,133,96,169,240 60 DATA133,89,169,224,133,91,32,191,163,169,55,133,1,88,96 80 SYS832:POKE850,160:SYS832 100 REM ___________________________ 101 REM _ DATEN FUER NEUE ZEICHEN _ 102 REM ___________________________ 130 POKE56576,PEEK(56576)AND252 135 POKE53272,8:POKE648,192 140 PRINT"[147]BITTE WARTEN !" 150 FORI=280TO559:READA:POKE57344+I,A:NEXT 210 DATA255,255,255,255,255,255,255,255 220 DATA0,0,0,37,205,255,255,255 230 DATA0,0,0,0,0,255,255,255 240 DATA137,66,36,24,153,36,66,137 245 DATA255,129,129,255,129,129,255,255 250 DATA3,13,49,193,193,49,13,3 255 DATA0,96,252,255,252,96,0,0 260 DATA60,60,60,24,24,0,0,0 265 DATA255,126,255,126,255,126,255,126 270 DATA0,0,0,255,255,255,0,0 275 DATA24,60,24,63,88,88,36,66 280 DATA25,61,25,62,88,88,36,66 285 DATA0,0,60,32,60,32,32,32 290 DATA0,0,68,68,68,68,68,124 295 DATA0,0,124,64,124,64,64,124 300 DATA0,0,32,32,32,32,32,60 305 DATA126,255,255,231,231,255,255,126 310 DATA0,0,0,0,8,5,3,7 315 DATA0,0,0,0,12,62,127,255 320 DATA0,0,6,31,127,255,255,255 325 DATA0,0,0,192,231,239,255,255 330 DATA0,0,56,252,252,254,255,255 335 DATA255,127,127,63,31,12,0,0 340 DATA255,255,254,152,0,0,0,0 345 DATA255,191,31,15,3,1,0,0 350 DATA255,255,255,248,248,224,0,0 355 DATA0,0,36,24,24,36,0,0 360 DATA65,39,18,207,63,191,127,255 365 DATA160,68,88,225,250,252,254,255 370 DATA255,255,255,255,255,255,255,255 375 DATA255,255,243,195,195,192,0,0 380 DATA0,0,35,254,35,0,0,0 385 DATA4,4,11,48,48,64,0,0 390 DATA0,0,196,127,196,0,0,0 395 DATA0,32,32,208,12,12,2,0 400 REM +++++++++++++++++ 401 REM + SPRITES DATEN + 402 REM +++++++++++++++++ 500 FORI=50304TO50304+62:READA:POKEI,A:NEXT 505 FORI=50368TO50368+62:READA:POKEI,A:NEXT 510 FORI=50432TO50432+62:READA:POKEI,A:NEXT 511 FORI=50496TO50496+62:READA:POKEI,A:NEXT 512 FORI=50560TO50560+62:READA:POKEI,A:NEXT 513 FORI=50624TO50624+62:READA:POKEI,A:NEXT 514 FORI=50688TO50688+62:READA:POKEI,A:NEXT 515 FORI=50752TO50752+62:READA:POKEI,A:NEXT 517 PRINT"  APOCALYPSE NOW " 518 PRINT" [158]BY HELMUT [159]BURGEMEISTER[154][157][157][157][157][157][157][157][157][157][157][157][157][157]AND HELMUT BOELCSKEI " 519 DATA0,0,0 520 DATA0,0,0,255,255,255,0,48,0,3,255,193,4,32,97,8,32,55,16,42,153 525 DATA96,34,1,128,79,131,128,66,6,128,138,152,255,128,96,64,64,128 530 DATA32,33,0,16,33,0,143,254,0,129,2,0,127,255,248,0,0,0,0,0,0 540 DATA0,0,0,0,0,0,31,255,240,0,40,0,0,16,0,0,104,0,0,132,0 545 DATA1,2,0,6,249,128,4,252,128,11,254,64,9,252,64,4,0,128,3,3,0,0,252,0 550 DATA1,50,0,2,1,0,4,0,128,28,0,224,0,0,0,0,0,0 560 DATA0,0,0,0,0,0,255,255,255,0,12,0,131,255,112,135,4,32 565 DATA252,4,16,153,68,8,128,68,6,193,242,1,96,66,1,24,65,1,6,1,255,1,2,2,0 570 DATA132,4,0,132,8,0,127,241,0,64,129,31,255,254,0,0,0,0,0,0 580 DATA0,0,240,0,15,1,0,240,193,15,111,103,240,240,65,3,32,145,4,42,3 585 DATA8,34,134,0,47,8,16,66,144,96,82,96,128,128,128,128,129,0,143,65,0 590 DATA240,33,0,64,46,8,32,242,240,31,15,0,129,240,0,143,0,0,112,0,0 600 DATA15,0,0,128,240,0,131,15,0,230,252,240,156,240,15,137,4,192,192,84,32 605 DATA97,68,16,16,244,0,9,66,8,6,82,6,1,1,1,0,129,1,0,130,241,0,132,15 610 DATA16,116,2,15,143,4,0,240,248,0,15,129,0,0,241,0,0,14 620 DATA0,0,0,0,0,0,0,3,0,0,15,0,0,63,0,0,240,0,0,192,0,0,20,0,0,20,0,0,40,0 625 DATA0,40,0,0,20,0,0,20,0,0,40,0,0,40,0,0,20,0,0,95,0,0,170,0,3,255,192 630 DATA13,95,112,3,255,192 640 DATA0,0,0,0,0,0,0,192,0,0,240,0,0,63,0,0,15,0,0,3,0,0,20,0,0,20,0,0,40,0 645 DATA0,40,0,0,20,0,0,20,0,0,40,0,0,40,0,0,20,0,0,95,0,0,170,0,3,255,192 650 DATA13,95,112,3,255,192 660 DATA128,0,1,71,255,242,36,0,4,16,255,12,25,0,148,38,0,100,2,0,68,69,36,196 665 DATA69,153,68,124,126,125,68,60,68,68,90,68,68,129,68,67,0,196,66,255,68,68 670 DATA20,36,40,34,20,16,65,24,47,255,228,64,0,2,128,0,1 700 REM ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ 701 REM ^ INETIALISIERUNG VARIABLEN ^ 702 REM ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ 997 GOSUB62130:POKE50169,22:POKE50168,18 998 V=53248:POKEV+21,1:POKEV+42,14 999 X=250:Y=94:GOSUB50000 1000 X=250:Y=94:A=1:OT=1:V=53248:POKE50168,18:GOSUB63000:O=PEEK(V+31):AB=AC 1001 POKEV+21,1:POKEV+29,3:POKEV+39,3:B=1:PRINT"[147]":Q=13:X2=0:Y2=90:B2=4:C2=3 1002 GOSUB60100:POKEV+21,1 1003 H=32:EN=10:PU=.05:B9=0:HU=0 1004 POKEV+2,X2:POKEV+3,Y2:HB=4 1005 POKEV+28,12:POKEV+37,2:POKEV+38,5 1006 POKE50170,23:POKE50171,24 1009 POKESI+11,65:JS=PEEK(V+30):O=PEEK(V+31) 1010 REM HAUPTPROGRAMM 1011 J=PEEK(56320):JS=PEEK(V+30) 1020 IF(JAND4)=0THENX=X-5:A=A-1 1030 IF(JAND8)=0THENX=X+5:A=A+1 1040 IF(JAND1)=0THENY=Y-5 1050 IF(JAND2)=0THENY=Y+5 1055 IFA>3THENA=3 1056 IFA<1THENA=1 1059 IFY<85THENY=85 1060 ONAGOSUB2000,2010,2020 1065 Y=Y+AB 1070 POKEV,X:POKEV+1,Y 1080 IF(JAND16)=0THENGOSUB2050 1090 O=PEEK(V+31):IFO=1THEN3200 1098 IFX>250THENB=B-1:X=250:BI=0:HU=0:B9=0:POKEV+21,1:IFB<1THENB=1 1099 IFX<5THENB=B+1:X=5:BI=0 1100 ONBGOSUB4500,5000,5500,6000 1110 POKE49152+EN+40*3,H:EN=EN-PU:H=32 1888 IFEN>10THEN1010 1889 GOSUB61000:GOSUB60900 1890 IFEN<=0THENEN=0:AB=4:POKESI+7,100:GOTO1065 1900 GOTO1010 1997 REM ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ 1998 REM ^BEWEGUNGSRICHTUNG VON SPRITE^ 1999 REM ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ 2000 IF(JAND4)=0THENPOKE50168,21:POKESI+7,255:RETURN 2001 POKE50168,18:POKESI+7,200 2009 RETURN 2010 POKE50168,19 2019 RETURN 2020 IF(JAND8)=0THENPOKE50168,22:POKESI+7,255:RETURN 2021 POKE50168,20:POKESI+7,200 2029 RETURN 2049 REM __________________ 2050 REM _ SCHUSS ROUTINE _ 2051 REM __________________ 2059 IF(JAND4)=0ANDA=1THENGOSUB3300:RETURN 2060 IFA=1THENGOSUB3000 2070 IFA=2THENGOSUB3030 2079 IF(JAND8)=0ANDA=3THENGOSUB3400:RETURN 2080 IFA=3THENGOSUB3060 2090 RETURN 3000 X1=INT(X/8-4):Y1=INT(Y/8-5) 3005 FORE=X1TO0STEP-1:GOSUB61400 3006 PO=PEEK(49152+E+40*Y1):POKE49152+E+40*Y1,66:POKE49152+E+40*Y1,PO 3007 IFPEEK(49152+E-1+40*Y1)<>32THENS=-1:GOTO3100 3010 NEXTE:RETURN 3030 X1=INT(X/8):Y1=INT(Y/8-3) 3033 FORE=Y1TO25STEP1:GOSUB61400 3040 PO=PEEK(49152+X1+40*E):POKE49152+X1+40*E,42:POKE49152+X1+40*E,PO 3045 IFPEEK(49152+X1+40*E+40)<>32THEN3110 3050 NEXTE:RETURN 3060 X1=INT(X/8+4):Y1=INT(Y/8-5) 3070 FORE=X1TO39STEP1:GOSUB61400 3075 PO=PEEK(49152+E+40*Y1):POKE49152+E+40*Y1,68:POKE49152+E+40*Y1,PO 3077 IFPEEK(49152+E+1+40*Y1)<>32THENS=1:GOTO3100 3080 NEXTE:RETURN 3097 REM +++++++++++++++++++++++ 3098 REM + AUFPRALL VON SCHUSS + 3099 REM +++++++++++++++++++++++ 3100 POKESI+10,3:GOSUB60700:IFPEEK(49152+E+S+40*Y1)<>51THEN3150 3102 POKE49152+E+S+40*Y1,38:FORT=0TO100:NEXT:POKE49152+E+S+40*Y1,32:E=0 3103 SC=SC+6:GOSUB61200:RETURN 3110 POKESI+10,3:GOSUB60700:IFPEEK(49152+X1+40*E+40)<>51THEN3170 3111 POKE49152+X1+40*E+40,38 3112 FORT=0TO110:NEXT:POKE49152+X1+40*E+40,32:E=0:SC=SC+8:GOSUB61200:RETURN 3150 PO=PEEK(49152+E+S+40*Y1):POKE49152+E+S+40*Y1,38 3160 FORT=0TO100:NEXT:POKE49152+E+S+40*Y1,PO:E=0 3165 RETURN 3170 PO=PEEK(49152+X1+40*E+40):POKE49152+X1+40*E+40,38 3180 FORT=0TO100:NEXT:POKE49152+X1+40*E+40,PO:E=0:RETURN 3197 REM ^^^^^^^^^^^^^^^^^^^^^^^^^^ 3198 REM ^ KOLLISION HUBSCHRAUBER ^ 3199 REM ^^^^^^^^^^^^^^^^^^^^^^^^^^ 3200 GOSUB60200:POKESI+18,0:POKEV+2,0:X2=0:Y2=INT(RND(1)*50)+90:HB=HB-1 3201 POKEV+3,Y2:O=PEEK(V+31):JS=PEEK(V+30) 3202 FORT=0TO100:P=INT(RND(1)*15):POKEV+39,P:NEXT:POKEV+39,3 3203 IFHB<=0THENPOKEV+21,0:PRINT"G A M E O V E R":GOTO8000 3210 X=250:Y=94:POKEV,X:POKEV+1,Y:O=PEEK(V+31):GOSUB60300:GOTO1009 3300 X1=INT(X/8-4):Y1=INT(Y/8-5) 3310 FORE=X1TO0STEP-1:GOSUB61400 3315 Y1=Y1+.5 3316 IFY1>=24THENY1=24:RETURN 3319 PO=PEEK(49152+E+40*INT(Y1)) 3320 POKE49152+E+40*INT(Y1),67 3321 POKE49152+E+40*INT(Y1),PO 3330 IFPEEK(49152+E-1+40*INT(Y1))<>32THENS=-1:GOTO3100 3340 NEXTE:RETURN 3400 X1=INT(X/8+4):Y1=INT(Y/8-5) 3410 FORE=X1TO39STEP1:GOSUB61400 3415 Y1=Y1+.5 3416 IFY1>=24THENY1=24:RETURN 3419 PO=PEEK(49152+E+40*INT(Y1)) 3420 POKE49152+E+40*INT(Y1),69 3421 POKE49152+E+40*INT(Y1),PO 3430 IFPEEK(49152+E+1+40*INT(Y1))<>32THENS=1:GOTO3100 3440 NEXTE:RETURN 3997 REM ________________________ 3998 REM _ BILD TANKEN AUFBAUEN _ 3999 REM ________________________ 4000 GOSUB60500:X2=0:Y2=90:POKEV+2,X2:POKEV+3,Y2 4001 X=250:Y=94:BI=1 4002 TR=49152:C=40:GOSUB4530 4009 REM ^^^^^^^^^^^^^^^^^^^^^^^^^^^^ 4010 REM ^ BILDSCHIRMABFRAGE TANKEN ^ 4011 REM ^^^^^^^^^^^^^^^^^^^^^^^^^^^^ 4500 IFBI=0THEN4000 4501 IFB9=0THEN:IFEN>30ANDHU<5THENB9=1:POKEV+21,3:GOSUB61570:X3=20 4502 ONB9GOSUB61300 4503 IFY<=175ANDKL=0THENRETURN 4504 IFX>140ANDX<175ANDKL=0THENKL=1:GOSUB4511:IFLD=1THENGOTO62000 4505 PU=.05:IFY>214ANDKL=1THENH=160:OT=1:AB=AC:PU=-1:GOSUB60800 4506 IFY>218ANDKL=1THENY=Y-AB-1 4507 IFY<=170ANDKL=1THENKL=0:GOSUB4530:RETURN 4508 IFY>214ANDKL=1ANDEN>=35THENEN=35:H=32:POKESI+18,0 4509 IFY<=214ANDKL=1THENPOKESI+18,0 4510 RETURN 4511 FORT=18TO23 4512 FORI=15TO24 4515 POKETR+I+40*T,32 4520 NEXT:NEXT 4521 PRINT"" 4522 PRINT" >#### [185][185][185][185][185][185][185][185] ####? 4523 [153]"$$$$$$$$$$##### ABSINT ABSINT #####$$$$$$$$$CONT 4529 RETURN 4530 PRINT"" 4531 PRINT" %%%%%%%%%% 4532 [153]" >###/012###? 4533 PRINT" >#''''''''''#? 4534 [153]" >##''''''''''##? 4536 PRINT" >###''''''''''###? 4537 [153]" >####''''''''''####? 4538 PRINT"$$$$$$$$$$#####''''''''''#####$$$$$$$$$[154] 4560 KL[178]0:[142] 4997 [143] ________________________ 4998 [143] _ BILD TUNNEL AUFBAUEN _ 4999 [143] ________________________ 5000 [139]BI[178]0[167]H[178]32:[137]5010 5005 [137]5300 5010 [141]60500:TI$[178]"000000" 5011 X[178]250:Y[178]94:BI[178]1:PX[178]45:PY[178]46 5019 [153]"" 5020 [153]" >6677656756567756765667878776767657 5030 FORT=0TO3:PRINT" ()":NEXT 5035 PRINT" () 6786876887678768676787867 5040 [129]T[178]0[164]2:[153]" () ++":[130] 5045 [153]" (67867887876767676668787 ++ 5050 PRINT" (9:[158])))))))))))))))))9;9: ++" 5085 PRINT" ( [156]333 3 ++ 5090 [153]" ( CLR3 3 ++ 5095 PRINT" ( [156]3 ++ 5096 [153]" ( CLR33333 CLR3 ++ 5100 PRINT" 788[159]333333388878787878787 ++ 5110 [153]" ;:9OPEN3333333;:9:9:;9:9:;9: ++ 5120 PRINT" [154] [206][205] ++ 5125 [153]" CONT (null) (null) ++ 5130 PRINT" [154] [206] [205] ++ 5135 [153]"$$$$$$$$$$$$CONT#$$$$$$CONT#$$$$$$$$$$$$$++CONT 5297 REM ++++++++++++++++++++++++++++ 5298 REM + BILDSCHIRMABFRAGE TUNNEL + 5299 REM ++++++++++++++++++++++++++++ 5300 POKETR+Q+C*17,PX 5320 POKETR+Q+C*17,PY:IFY<170THENRETURN 5340 GE=INT(RND(1)*15):IFGE>10THENGOSUB60000 5345 IFX<140ANDX>120ANDY>174ANDY<178THENPX=32:PY=32:GOSUB61100:GOSUB61200 5350 IFTI$>"000005"THENGOSUB60070 5407 IFY<=214THENPOKESI+18,0 5410 RETURN 5497 REM ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ 5498 REM ^ BILDSCHIRM PANZER AUFBAUEN ^ 5499 REM ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ 5500 IFBI=0THENH=32:GOTO5510 5505 GOTO5700 5510 GOSUB60500 5520 X=250:Y=94:BI=1:B5=-2:POKEV+5,223:POKEV+7,223:X5=50:X6=120:POKEV+21,13 5521 POKEV+4,X5:POKEV+6,X6:GOSUB5800 5530 PRINT"":B6=2:Y7=20:G9=1 5540 PRINT"767878787878786868887868786878687868786" 5545 PRINT":;:;:;9:;9;9:9:;9:;9 " 5547 PRINT"+) (+" 5550 FORT=0TO2:PRINT"+) (+[159]333333":NEXT 5555 PRINT"+) + (+[159]3333333337786876787" 5560 FORT=0TO3:PRINT"[159] 3 + (+[159]333333333+)":NEXT 5565 FORT=0TO5:PRINT"+) + [159]333 333333+)":NEXT 5570 FORT=0TO2:PRINT" (+[159]333333333+)":NEXT 5575 PRINT"$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$[154]" 5697 REM ++++++++++++++++++++++++++++ 5698 REM + BILDSCHIRMABFRAGE PANZER + 5699 REM ++++++++++++++++++++++++++++ 5700 IFX>168THENRETURN 5710 IFX5>138THENB5=3:POKE50170,24 5715 IFX5<30THENB5=-2:POKE50170,23 5720 IFX6>138THENB6=2:POKE50171,24 5730 IFX6<30THENB6=-3:POKE50171,23 5740 X5=X5-B5:X6=X6-B6 5750 POKEV+4,X5:POKEV+6,X6 5755 JS=PEEK(V+30):IFJS=5ORJS=9ORJS=13THEN3200 5765 ONG9GOSUB5820,5900 5770 RETURN 5800 X7=INT(X5/8-1):Y7=21 5810 RETURN 5811 X8=INT(X6/8-1):Y8=21 5815 RETURN 5820 Y7=Y7-1 5835 PO=PEEK(49152+X7+40*Y7-40) 5840 POKE49152+X7+40*Y7,90 5850 IFPO<>32THENPOKE49152+X7+40*Y7-40,PO:POKE49152+X7+40*Y7,32:G9=2:GOSUB5811 5860 POKE49152+X7+40*Y7,32 5870 RETURN 5900 Y8=Y8-1 5920 PO=PEEK(49152+X8+40*Y8-40) 5930 POKE49152+X8+40*Y8,90 5940 IFPO<>32THENPOKE49152+X8+40*Y8-40,PO:POKE49152+X8+40*Y8,32:G9=1:GOSUB5800 5950 POKE49152+X8+40*Y8,32 5960 RETURN 5997 REM ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ 5998 REM ^ BILDSCHIRM SPINNE AUFBAUEN ^ 5999 REM ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ 6000 IFBI=0THENH=32:GOTO6020 6010 GOTO6300 6020 GOSUB60500:TI$="000000":V=53248:POKE50172,25:POKEV+8,50:POKEV+9,157 6030 X=250:Y=110:BI=1:POKEV+23,16:POKEV+29,19:POKEV+21,17 6040 POKEV,X:POKEV+1,Y:O=PEEK(V+31) 6050 PRINT"" 6060 PRINT" 678787867868786876878677867 6070 [153]" +;9:;9:9;9;9:9;+9:;:;ATN;9:;9 6080 FORT=0TO1:PRINT" +) (+":NEXT 6090 FORT=0TO2:PRINT" +) ":NEXT 6100 PRINT" 76768787868+ 6110 [153]"(+++++++++++ +) ^ACHTUNG^ 6120 PRINT"(++ ++) (+) 6130 [153]"(++ ++ +) 6140 PRINT"(+ [159]333 +) 6150 [153]"(+ OPEN333 +) 6160 PRINT"(++ ++ +) 6170 [153]"(++ ++) (+) 6180 PRINT"(+++++++++++7 +) 6190 [153]" ::;9:;:9;9:+ +) 6200 PRINT" +) [156]+( +) 6210 [153]" +) CLR+(ANDANDANDANDANDANDANDCLR+) 6220 PRINT" +) [156]+( [159]/012 [156]+) 6230 [153]"$$$$$$$$$$$$+$$$$$CLR+$$$$$$$$CLR+$$$$$$$$$$CONT" 6297 [143] ++++++++++++++++++++++++++++ 6298 [143] + BILDSCHIRMABFRAGE SPINNE + 6299 [143] ++++++++++++++++++++++++++++ 6300 [139]TI$[177]"000007"[167][141]6400 6305 [139]TI$[177]"000010"[167][141]6420 6310 PU[178].05:[139]Y[177]206[175]X[177]180[175]X[179]190[167][141]6440 6320 [139]Y[179][178]206[167][151]SI[170]18,0 6325 O[178][194](V[170]31):[139]O[178]16[167][141]6550 6399 [142] 6400 [153]"ASCASCASCASCASCASCASCASCASCASCASCASCASCCONT" 6405 O[178][194](V[170]31):[139]O[178]1[167]3200 6410 [153]" " 6415 [142] 6420 [153]"ASCASCASCASCASCASCASCASCASCASCASCASCASCCONT" 6425 O[178][194](V[170]31):[139]O[178]1[167]3200 6430 [153]" " 6435 TI$[178]"000000":[142] 6440 [139]HA[178]1[167][142] 6441 PU[178].05:OT[178]1:H[178]160:PU[178][171]1:[141]60800:[139]EN[177]35[167]EN[178]35:HA[178]1:H[178]32:PU[178].05:OT[178]1 6450 [139]Y[177]209[167]Y[178]Y[171]AB[171]1 6460 [142] 6550 [129]T[178]0[164]180:[151]53280,T:[151]53281,T:[141]60700:[130]:[151]53280,0 6552 [151]53281,0:LD[178]1:SC[178]SC[170]1000:[141]61200 6560 [151]V[170]21,1:[142] 6697 [143] ++++++++++++++++++ 6698 [143] + PUNKTE WERTUNG + 6699 [143] ++++++++++++++++++ 8000 [129]T[178]0[164]1500:[130]:[153]"LOADNOCH EINMAL [J] " 8002 [153]"SCORE ";SC 8003 [139]SC[177]AS[167]AS[178]SC 8004 [153]"HIGHSCORE ";AS 8010 [151]198,0:[146]198,1:[161]A$:[139]A$[178]"J"[167]9000 8015 [151]648,4:[158]65126 8020 [153]"LOAD DANKE!!! GOOD BYE !!!!!!!!!":[128] 9000 BI[178]0:B9[178]0:EN[178]0:HU[178]0:PU[178]0:AB[178]0:KL[178]0:H[178]0:PX[178]0:PY[178]0:GE[178]0:PO[178]0:G9[178]0 9010 B[178]0:HA[178]0:LD[178]0:SC[178]0:AC[178]0:[151]V[170]23,0:[151]V[170]29,0:[137]998 10000 [143] ^^^^^^^^^^^^^^^^^^^^^^^^^ 10001 [143] ^ ANFANGSSPRITE BEWEGEN ^ 10002 [143] ^^^^^^^^^^^^^^^^^^^^^^^^^ 50000 [151]V,X:[151]V[170]1,Y 50010 X1[178][181](X[173]8[171]4):Y1[178][181](Y[173]8[171]5) 50020 [129]E[178]X1[164]0[169][171]1 50030 [151]49152[170]E[170]40[172]Y1,66:[151]49152[170]E[170]40[172]Y1,32 50040 [139][194](49152[170]E[171]1[170]40[172]Y1)[179][177]32[167][151]49152[170]E[171]1[170]40[172]Y1,38:[137]50070 50050 [130]E:[142] 50070 [129]T[178]0[164]100:[130]:[151]49152[170]E[171]1[170]40[172]Y1,32:X[178]X[171]3:E[178]0:[137]50000 60000 [151]TR[170]Q[170]C[172]17,32:Q[178]Q[171][181]([187](1)[172]3):Q[178]Q[170][181]([187](1)[172]3) 60010 [139]Q[179]11[167]Q[178]11 60020 [139]Q[177]14[167]Q[178]14 60060 [142] 60070 OT[178]OT[172][171]1:TI$[178]"000000" 60075 [153]"" 60080 [139]OT[178][171]1[167][129]T[178]0[164]2:[153]" ":[130]:[142] 60085 [153]"CONT (null)(null) " 60086 [153]" (null)CLOSECLOSE(null) " 60087 [153]"(null) (null)CONT" 60090 [142] 60099 [143] GERAEUSCHE 60100 SI[178]54272:[151]SI[170]7,200:[151]SI[170]8,0:[151]SI[170]9,0:[151]SI[170]10,3:[151]SI[170]11,0 60110 [151]SI[170]12,0:[151]SI[170]13,15[172]16[170]15:[151]SI[170]21,0:[151]SI[170]22,150:[151]SI[170]23,243 60120 [151]SI[170]24,31:[151]SI[170]11,65 60130 [142] 60200 [151]SI[170]11,0 60201 [151]SI[170]1,5:[151]SI[170]4,0:[151]SI[170]5,11:[151]SI[170]6,0 60202 [151]SI[170]4,131 60210 [142] 60300 [139]EN[179][178]1[167]EN[178]15:[139]B[177]1[167]EN[178]35 60301 [153]"  CONT" 60302 [153]"LEBEN "HB 60303 [153]"SYSENERGYCONT":[129]T[178]0[164]EN:[151]49152[170]T[170]40[172]3,160:[130] 60304 [153]" " 60310 X[178]250:Y[178]94:AB[178]AC:H[178]32:[141]61200 60315 [139]B[178]4[167]Y[178]110 60320 [142] 60500 [153]"LOAD  CONT" 60501 [153]"SYSENERGYCONT" 60502 [129]T[178]0[164]EN:[151]49152[170]T[170]40[172]3,160:[130]:[141]61200 60550 [142] 60700 SI[178]54272:[151]SI[170]4,0:[151]SI[170]1,10:[151]SI[170]5,12:[151]SI[170]6,0:[151]SI[170]4,131 60710 [142] 60720 SI[178]54272:[151]SI[170]4,0:[151]SI[170]1,20:[151]SI[170]5,12:[151]SI[170]6,0:[151]SI[170]4,131 60730 [142] 60800 SI[178]54272:[151]SI[170]18,0:[151]SI[170]19,0:[151]SI[170]20,15[172]16 60810 [151]SI[170]14,200:[151]SI[170]15,39:[151]SI[170]18,17 60820 [142] 60900 SI[178]54272:[151]SI[170]18,0:[151]SI[170]19,0:[151]SI[170]20,15[172]16[170]2 60910 [151]SI[170]14,200:[151]SI[170]15,59:[151]SI[170]18,17 60920 [142] 61000 OT[178]OT[172][171]1:[139]OT[178][171]1[167][153]" ":[142] 61001 [153]"OPENLOW ON FUELCONT" 61002 [142] 61100 SC[178]SC[170]100:[153]"+CMD+CMD+CMD+CONT" 61120 [142] 61200 [153]"SCORE ";SC;"WAITCONT" 61210 [142] 61297 [143] +++++++++++++++++++++++++++++ 61298 [143] + FEINDHUBSCHRAUBER BEWEGEN + 61299 [143] +++++++++++++++++++++++++++++ 61300 [139]X[177]X2[167]B2[178][170]5:M4[178]22 61310 [139]X[179]X2[167]B2[178][171]5:M4[178]21 61320 [139]Y[177]Y2[167]C2[178][170]3 61330 [139]Y[179]Y2[167]C2[178][171]3 61335 X2[178]X2[170]B2:Y2[178]Y2[170]C2 61340 [151]V[170]2,X2:[151]V[170]3,Y2 61341 O[178][194](V[170]31) 61342 JS[178][194](V[170]30) 61350 [139]JS[178]3[167]3200 61351 [139]O[178]2[167]61500 61352 JS[178][194](V[170]30) 61353 [139]HU[177]3[167][141]61530 61354 O[178][194](V[170]31) 61355 [151]50169,M4 61360 [142] 61400 [139]B[178]3[167]61430 61401 [139]B[178]4[167]61470 61402 [139]HU[177]4[167][142] 61410 O[178][194](V[170]31):[139]O[178]2[167]61500 61420 [142] 61430 O[178][194](V[170]31):[139]O[178]12[167][141]61450:[151]V[170]21,1:SC[178]SC[170]200:[141]61200:G9[178]0 61440 [142] 61450 [141]60720:[129]T[178]0[164]100:[151]V[170]38,T:[130]:[142] 61470 O[178][194](V[170]31):[139]O[178]16[167]:[141]6550 61480 [142] 61500 HU[178]HU[170]1:SC[178]SC[170]100:[141]61200 61501 [141]60700 61502 [129]T[178]0[164]100:[151]V[170]40,T:[130]:X2[178]0:[151]V[170]2,X2:Y2[178][181]([187](1)[172]50)[170]90 61503 [151]V[170]3,Y2 61504 [139]HU[177]4[167][151]V[170]21,1:B9[178]0 61510 E[178]0:[142] 61530 X3[178]X3[170]1 61535 [139]X3[177]X[173]8[167][141]61570 61536 [139]X3[177]39[167][141]61570 61540 [151]49152[170]X3[170]40[172][181](Y3),68 61545 O[178][194](V[170]31):[139]O[178]1[167][151]49152[170]X3[170]40[172][181](Y3),32:[137]3200 61550 [151]49152[170]X3[170]40[172][181](Y3),32 61560 [142] 61570 X3[178][181](X2[173]8[170]4):Y3[178][181](Y2[173]8[171]5) 61580 [142] 61997 [143] _________ 61998 [143] _ MUSIK _ 61999 [143] _________ 62000 [129]I[178]54272[164]54296:[151]I,0:[130]:[151]54296,15:[151]54275,3 62110 H1[178]54272:H2[178]H1[170]1:AD[178]54277:SR[178]AD[170]1:DR[178]AD[171]1:W1[178]64:W2[178]32 62120 [151]AD,72:[151]SR,122:[151]AD[170]7,43:[151]SR[170]7,187:[137]62250 62130 [134]F$(18),FL(18),FH(18):[129]I[178]0[164]18 62140 [135]F$(I),F:FH(I)[178][181](F[173]256):FL(I)[178]F[171]FH(I)[172]256:[130] 62150 [134]N1$(200),D1(200),N2$(200),D2(200):I[178]0 62160 [135]N1$(I),D1(I):[139]D1(I)[177]0[167]I[178]I[170]1:[137]62160 62170 I[178]0 62180 [135]N2$(I),D2(I):[139]D2(I)[177]0[167]I[178]I[170]1:[137]62180 62200 [134]L1(200),H1(200),L2(200),H2(200):I[178]0 62210 [129]J[178]0[164]18 62220 [139]F$(J)[178]N1$(I)[167]L1(I)[178]FL(J):H1(I)[178]FH(J) 62230 [139]F$(J)[178]N2$(I)[167]L2(I)[178]FL(J):H2(I)[178]FH(J) 62240 [130]:I[178]I[170]1:[139]N1$(I)[179][177]""[167]62210 62245 [142] 62250 SP[178][197]("2") 62260 [139]SP[179]1[176]SP[177]4[167]62250 62270 S1[178]0:S2[178]0:C1[178]0:C2[178]0:[151]H1,L1(S1):[151]H2,H1(S1) 62280 [151]H1[170]7,L2(S2):[151]H2[170]7,H2(S2):[151]DR,W1[176]1:[151]DR[170]7,W2[176]1 62290 C1[178]C1[170]1:[139]C1[177](D1(S1)[172]SP[173]2)[167][151]DR,W1 62300 [139]C1[179](D1(S1)[172]SP)[167]62320 62310 C1[178]0:S1[178]S1[170]1:[151]DR,W1[176]1:[151]H1,L1(S1):[151]H2,H1(S1) 62320 C2[178]C2[170]1:[139]C2[177](D2(S2)[172]SP[173]2)[167][151]DR[170]7,W2 62330 [139]C2[179](D2(S2)[172]SP)[167]62350 62340 C2[178]0:S2[178]S2[170]1:[151]DR[170]7,W2[176]1:[151]H1[170]7,L2(S2):[151]H2[170]7,H2(S2) 62350 [139]D1(S1)[177]0[167]62290 62360 [151]V[170]21,0:[137]8000 62370 [131]D3,2408,E3,2703,F#3,3034,G3,3215 62380 [131]A3,3608,H3,4050,C#4,4547,D4,4817 62390 [131]E4,5407,F#4,6069,G4,6403,A4,7217 62400 [131]H4,8101,C#5,9094,D5,9634,E5,10814 62410 [131]F#5,12139,G5,12860,A5,14435 62420 [143] 1.STIMME 62430 [131]D5,3,D5,1,D5,1,E5,1,D5,1,C#5,1,H4,4,H4,4,C#5,1,C#5,1 62440 [131]D5,1,E5,3,D5,1,E5,1,F#5,2,F#5,2,E5,1,A4,3 62450 [131]D5,3,D5,1,D5,1,E5,1,D5,1,C#5,1,H4,4,H4,4,C#5,1,C#5,1 62460 [131]D5,1,E5,3,D5,1,E5,1,F#5,2,F#5,2,E5,1,A4,3 62470 [131]F#5,2,A5,2,G5,2,F#5,1,D5,1,E5,1,F#5,2,E5,5 62480 [131]F#5,3,E5,1,D5,2,D5,1,H4,1,E5,1,F#5,2,E5,3,D5,1,E5,1 62490 [131]F#5,2,A5,2,G5,2,F#5,1,D5,1,E5,1,C#5,1,H4,1,A4,5 62500 [131]D5,3,C#5,1,H4,1,C#5,1,D5,2,E5,10 62510 [131]F#5,2,E5,6,F#5,2,E5,2,D5,1,E5,1,F#5,2,A5,2,G5,2,F#5,1,D5,3,F#5,2,E5,6 62520 [131]F#5,2,E5,6,F#5,2,E5,2,D5,1,E5,1,F#5,2,A5,2,G5,2,F#5,1,D5,1 62530 [131]E5,1,C#5,1,H4,1,A4,3,H4,1,C#5,1 62540 [131]D5,3,D5,1,D5,1,E5,1,D5,1,C#5,1,H4,4,H4,4,C#5,1,C#5,1 62550 [131]D5,1,E5,3,D5,1,E5,1,F#5,2,F#5,2,E5,1,A4,3 62560 [131]D5,3,D5,1,D5,1,E5,1,D5,1,C#5,1,H4,4,H4,4,C#5,1,C#5,1 62570 [131]D5,1,E5,3,D5,1,E5,1,F#5,2,F#5,2,E5,1,D5,7 62580 [131],-1 62590 [143] 2.STIMME 62600 [131]D3,4,D3,4,G3,4,H3,2,D3,2,A3,4,A3,4,D3,4,A3,2,E4,1,A3,1 62610 [131]D3,4,D3,4,G3,4,H3,2,D3,2,A3,4,A3,4,D3,4,A3,2,E4,1,A3,1 62620 [131]D3,4,D3,4,A3,4,A3,4,H3,4,G3,4,A3,4,A3,4 62630 [131]D3,4,D3,4,A3,4,A3,4,H3,4,G3,4,A3,4,A3,3 62640 [131]A3,1,A3,7,A3,1,A3,8,D3,4,D3,4,A3,4,A3,3 62650 [131]A3,1,A3,7,A3,1,A3,8,D3,4,D3,4,A3,4,A3,4 62660 [131]D3,4,D3,4,G3,4,H3,2,D3,2,A3,4,A3,4,D3,4,A3,2,E4,1,A3,1 62670 [131]D3,4,D3,4,G3,4,H3,2,D3,2,A3,4,A3,4,D3,4,D3,8 62680 [131],-1 62997 [143] +++++++++++++++ 62998 [143] + GRAVITATION + 62999 [143] +++++++++++++++ 63000 [153][199](142):[151]V[170]21,0 63001 [153]"LOADGRAVITATION [ 1 ASC 3 ]" 63010 [151]198,0:[146]198,1:[161]A$:[139]A$[178]"1"[167]AC[178].1 63020 [139]A$[178]"2"[167]AC[178].5 63030 [139]A$[178]"3"[167]AC[178]1 63040 [139]A$[179]"1"[176]A$[177]"3"[167]63010 63050 [142]